﻿Imports System.Data.SqlClient


Public Class _Default
    Inherits System.Web.UI.Page
    Dim s As New Sach_BLL()
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        show_Sach()
    End Sub

    Public Sub show_Sach()


        DataList.DataSource = s.loadSachUserPage()
        DataList.DataBind()

    End Sub


End Class